perm filename LABMAC.PUB[DOC,LMM] blob sn#061976 filedate 1973-09-11 generic text, type T, neo UTF8
COMMENT ⊗   VALID 00004 PAGES 
RECORD PAGE   DESCRIPTION
 00001 00001
 00002 00002	.<< pub macros, declarations >>
 00004 00003	.COUNT FIGGER INLINE PRINTING "α1β"
 00006 00004	.MACRO GRAF (HDNG) ⊂ 
 00007 ENDMK
⊗;
.<< pub macros, declarations >>
.DEVICE XGP
.
.PAGE FRAME 56 HIGH 75 WIDE
.AREA TEXT LINES 4 TO 54 ;
.TITLE AREA HEADING LINES 1 TO 3 ;
.TITLE AREA FOOTING LINE 56 ;
.
.FONT 1 "NGR25";
.FONT 2 "BDI25";
.FONT 3 "NGB25";
.FONT 4 "FIX25";
.FONT 5 "FIX13X";
.AT "β" ⊂ TURN ON "%{" }%*{TURN OFF⊃;
.AT "λ" ⊂ TURN ON "%{" }%2{TURN OFF⊃;
.AT "α" ⊂ TURN ON "%{" }%3{TURN OFF⊃;
.AT "ε" ⊂ TURN ON "%{" }%4{TURN OFF⊃;
.AT "~" ⊂ TURN ON "%{" }%5{TURN OFF⊃;
.select 1
.
.MACRO SEPLIN ⊂
ε______________________________________________________________________β
.⊃;
.
.<< footnote macros >>
.FOOTSEP←"____________________________________"
.COUNT REFERENCE INLINE PRINTING "↑[1]"
.AT "<<" LABEL ":" TEXT ">" ⊂
.LABEL: NEXT REFERENCE!;!;
.SEND FOOT ⊂
.PREFACE 1; SPREAD←1; INDENT 0,0; TURNON "{";
{REFERENCE! LABEL}TEXT
.TURNOFF
.BREAK ⊃ ⊃
.
.COUNT FIGGER INLINE PRINTING "α1β"
.MACRO FIGURE(NUM,SIZ,FIGHEAD) ⊂ 
.GROUP SKIP SIZ
.⊃
.
.<<label macros >>
.MACRO HD (HEADING) ⊂
.BEGIN IF LINES<10 THEN SKIP TO COLUMN 1 ELSE SKIP 2; NOFILL;BREAK;
αHEADINGβ
.END; ONCE PREFACE 1;⊃
.
.MACRO TITL (TITLE) ⊂
.SKIP TO COLUMN 1;
.BEGIN CENTER;
αTITLEβ
.END;⊃
.
.MACRO GRAF (HDNG) ⊂ 
αHDNG.β
.⊃
.
.MACRO I6 ⊂ INDENT 6,6,6; SPREAD←1; PREFACE 1; ⊃
.MACRO SPACE1 ⊂ SPREAD←1; PREFACE 2; BREAK; ⊃
.MACRO SPACE2 ⊂ SPREAD←2; PREFACE 3; BREAK; ⊃
.
.TURNON "↑↓[]&"
.
.EVERY FOOTING(,{PAGE},)
.SPACE2;